home *** CD-ROM | disk | FTP | other *** search
/ CD World 1997 November / CD World - Kasım 1997.iso / graphics / avi / avict32.exe / 0 / RCDATA / TAVILISTWND / TAVILISTWND.txt < prev   
Text File  |  1997-06-04  |  40KB  |  1,354 lines
  1. object AVIListWnd: TAVIListWnd
  2.   Left = 287
  3.   Top = 138
  4.   Width = 524
  5.   Height = 378
  6.   Caption = 'AVI Constructor'
  7.   Color = clBlack
  8.   Font.Color = clWindowText
  9.   Font.Height = -16
  10.   Font.Name = 'System'
  11.   Font.Style = []
  12.   Icon.Data = {<image000.ico>}
  13.   KeyPreview = True
  14.   Menu = MainMenu1
  15.   Position = poScreenCenter
  16.   OnClose = FormClose
  17.   OnCloseQuery = FormCloseQuery
  18.   OnCreate = FormCreate
  19.   OnKeyPress = FormKeyPress
  20.   OnResize = FormResize
  21.   PixelsPerInch = 120
  22.   TextHeight = 20
  23.   object DPanel: TMRPanel
  24.     Left = 129
  25.     Top = 0
  26.     Width = 387
  27.     Height = 322
  28.     Align = alClient
  29.     BevelOuter = bvNone
  30.     Color = clBlack
  31.     Font.Color = clBlack
  32.     Font.Height = -17
  33.     Font.Name = 'MS Sans Serif'
  34.     Font.Style = []
  35.     ParentFont = False
  36.     ParentShowHint = False
  37.     PopupMenu = PopupMenu2
  38.     ShowHint = True
  39.     TabOrder = 0
  40.     OnResize = DPanelResize
  41.     BorderColor = clBlack
  42.     BorderSides = []
  43.     Moveable = False
  44.     CBorderStyle = cbsNone
  45.     OnPaint = DPanelPaint
  46.     object ColorLabel: TLabel
  47.       Left = 0
  48.       Top = 258
  49.       Width = 387
  50.       Height = 19
  51.       Align = alBottom
  52.       Alignment = taCenter
  53.       FocusControl = btn16
  54.       Font.Color = clWhite
  55.       Font.Height = -17
  56.       Font.Name = 'Times New Roman'
  57.       Font.Style = [fsBold]
  58.       ParentFont = False
  59.       Visible = False
  60.     end
  61.     object NumberLabel: TLabel
  62.       Left = 0
  63.       Top = 239
  64.       Width = 387
  65.       Height = 19
  66.       Align = alBottom
  67.       Alignment = taCenter
  68.       Font.Color = clWhite
  69.       Font.Height = -17
  70.       Font.Name = 'Times New Roman'
  71.       Font.Style = [fsBold]
  72.       ParentFont = False
  73.     end
  74.     object PaintBox: TPaintBox
  75.       Left = 0
  76.       Top = 0
  77.       Width = 387
  78.       Height = 239
  79.       Align = alClient
  80.       PopupMenu = PopupMenu2
  81.     end
  82.     object MRPanel1: TMRPanel
  83.       Left = 0
  84.       Top = 277
  85.       Width = 387
  86.       Height = 45
  87.       Align = alBottom
  88.       BorderWidth = 2
  89.       TabOrder = 0
  90.       OnResize = MRPanel1Resize
  91.       BevelSides = [sdTop]
  92.       BorderSides = []
  93.       Moveable = False
  94.       CBorderStyle = cbsNone
  95.       object FPSLabel: TLabel
  96.         Left = 3
  97.         Top = 3
  98.         Width = 57
  99.         Height = 39
  100.         Hint = 'Flips Per Second for the AVI'
  101.         Align = alLeft
  102.         Caption = 'AVI FPS'
  103.         Color = clBtnFace
  104.         Font.Color = clBtnText
  105.         Font.Height = -15
  106.         Font.Name = 'Times New Roman'
  107.         Font.Style = [fsBold]
  108.         ParentColor = False
  109.         ParentFont = False
  110.       end
  111.       object FPSSpin: TASpinEdit
  112.         Left = 60
  113.         Top = 3
  114.         Width = 55
  115.         Height = 39
  116.         Hint = 'Flips Per Second for the AVI'
  117.         Ctl3D = True
  118.         Font.Color = clWindowText
  119.         Font.Height = -15
  120.         Font.Name = 'Times New Roman'
  121.         Font.Style = [fsBold]
  122.         MaxValue = 10000
  123.         MinValue = 1
  124.         ParentCtl3D = False
  125.         ParentFont = False
  126.         ParentShowHint = False
  127.         ShowHint = True
  128.         TabOrder = 0
  129.         Value = 8
  130.         OnChange = FPSSpinChange
  131.         Align = alLeft
  132.       end
  133.       object BtnMono: TABitbtn
  134.         Left = 147
  135.         Top = 3
  136.         Width = 30
  137.         Height = 39
  138.         Hint = 'Make Monochrome AVI'
  139.         Font.Color = clBlack
  140.         Font.Height = -17
  141.         Font.Name = 'System'
  142.         Font.Style = [fsBold]
  143.         ParentFont = False
  144.         ParentShowHint = False
  145.         ShowHint = True
  146.         TabOrder = 1
  147.         OnClick = BtnMonoClick
  148.         Glyph.Data = {
  149.           80000000424D80000000000000003E0000002800000020000000100000000100
  150.           01000000000000000000120B0000120B00000000000000000000FFFFFF000000
  151.           00007FFF7FFFAAAAAAAAFFFFFFFF0001000000010000078103C0020101000301
  152.           018001010080018100C0058102C00301018000010000FFFFFFFFAAAAAAAAFFFF
  153.           FFFF0000}
  154.         NumGlyphs = 2
  155.         Align = alLeft
  156.       end
  157.       object btn16: TABitbtn
  158.         Left = 177
  159.         Top = 3
  160.         Width = 32
  161.         Height = 39
  162.         Hint = 'Make 16 Color AVI'
  163.         Font.Color = clBlack
  164.         Font.Height = -15
  165.         Font.Name = 'Times New Roman'
  166.         Font.Style = [fsItalic]
  167.         ParentFont = False
  168.         ParentShowHint = False
  169.         ShowHint = True
  170.         TabOrder = 2
  171.         OnClick = btn16Click
  172.         Glyph.Data = {
  173.           80000000424D80000000000000003E0000002800000020000000100000000100
  174.           01000000000000000000120B0000120B00000000000000000000FFFFFF000000
  175.           00007FFF7FFFAAAAAAAAFFFFFFFF00010000000100001E610F300CD106680CD1
  176.           06680CD106680CE106700C4106201C310E1800010000FFFFFFFFAAAAAAAAFFFF
  177.           FFFF0000}
  178.         NumGlyphs = 2
  179.         Align = alLeft
  180.       end
  181.       object btn256: TABitbtn
  182.         Left = 209
  183.         Top = 3
  184.         Width = 33
  185.         Height = 39
  186.         Hint = 'Make 256 Color AVI'
  187.         Font.Color = clBlack
  188.         Font.Height = -15
  189.         Font.Name = 'Times New Roman'
  190.         Font.Style = [fsItalic]
  191.         ParentFont = False
  192.         ParentShowHint = False
  193.         ShowHint = True
  194.         TabOrder = 3
  195.         OnClick = btn256Click
  196.         Glyph.Data = {
  197.           80000000424D80000000000000003E0000002800000020000000100000000100
  198.           01000000000000000000120B0000120B00000000000000000000FFFFFF000000
  199.           00007FFF7FFFAAAAAAAAFFFFFFFF0001000000010000F7197B8C44B5225A60B5
  200.           305A27B513DA37391B9CB2115908638D31C600010000FFFFFFFFAAAAAAAAFFFF
  201.           FFFF0000}
  202.         NumGlyphs = 2
  203.         Align = alLeft
  204.       end
  205.       object btntc: TABitbtn
  206.         Left = 242
  207.         Top = 3
  208.         Width = 32
  209.         Height = 39
  210.         Hint = 'Make True Color AVI'
  211.         Font.Color = clBlack
  212.         Font.Height = -17
  213.         Font.Name = 'System'
  214.         Font.Style = [fsBold]
  215.         ParentFont = False
  216.         ParentShowHint = False
  217.         ShowHint = True
  218.         TabOrder = 4
  219.         OnClick = btntcClick
  220.         Glyph.Data = {
  221.           80000000424D80000000000000003E0000002800000020000000100000000100
  222.           01000000000000000000120B0000120B00000000000000000000FFFFFF000000
  223.           00007FFF7FFFAAAAAAAAFFFFFFFF00010000000100003C711E3818C90C6418C1
  224.           0C6018C10C6018C10C605AD92D6C7E693F3400010000FFFFFFFFAAAAAAAAFFFF
  225.           FFFF0000}
  226.         NumGlyphs = 2
  227.         Align = alLeft
  228.       end
  229.       object BtnUnknown: TABitbtn
  230.         Left = 115
  231.         Top = 3
  232.         Width = 32
  233.         Height = 39
  234.         Hint = 'Make an AVI by the format of the first image.'
  235.         Font.Color = clBlack
  236.         Font.Height = -17
  237.         Font.Name = 'System'
  238.         Font.Style = [fsBold]
  239.         ParentFont = False
  240.         ParentShowHint = False
  241.         ShowHint = True
  242.         TabOrder = 5
  243.         OnClick = BtnUnknownClick
  244.         Glyph.Data = {
  245.           80000000424D80000000000000003E0000002800000020000000100000000100
  246.           01000000000000000000120B0000120B00000000000000000000FFFFFF000000
  247.           00007FFF7FFFAAAAAAAAFFFFFFFF000100000001000003010180000100000301
  248.           0180018100C000C1006006C10360038101C000010000FFFFFFFFAAAAAAAAFFFF
  249.           FFFF0000}
  250.         NumGlyphs = 2
  251.         Align = alLeft
  252.       end
  253.     end
  254.     object BuildPanel: TPanel
  255.       Left = 256
  256.       Top = 312
  257.       Width = 25
  258.       Height = 25
  259.       BorderWidth = 12
  260.       Font.Color = clBlack
  261.       Font.Height = -17
  262.       Font.Name = 'System'
  263.       Font.Style = [fsBold]
  264.       ParentFont = False
  265.       PopupMenu = PopupMenu3
  266.       TabOrder = 1
  267.       Visible = False
  268.       object BuildGauge: TGauge
  269.         Left = 13
  270.         Top = 33
  271.         Width = 199
  272.         Height = 25
  273.         Align = alTop
  274.         Progress = 0
  275.       end
  276.       object FileNameLabel: TLabel
  277.         Left = 13
  278.         Top = 13
  279.         Width = 199
  280.         Height = 20
  281.         Align = alTop
  282.         Alignment = taCenter
  283.         Font.Color = clBlack
  284.         Font.Height = -17
  285.         Font.Name = 'System'
  286.         Font.Style = [fsBold]
  287.         ParentFont = False
  288.       end
  289.       object FileSizeLabel: TLabel
  290.         Left = 13
  291.         Top = 58
  292.         Width = 199
  293.         Height = 20
  294.         Align = alTop
  295.         Alignment = taCenter
  296.         Font.Color = clBlack
  297.         Font.Height = -17
  298.         Font.Name = 'System'
  299.         Font.Style = [fsBold]
  300.         ParentFont = False
  301.       end
  302.       object CommentLabel: TLabel
  303.         Left = 13
  304.         Top = 151
  305.         Width = 199
  306.         Height = 20
  307.         Align = alTop
  308.         Alignment = taCenter
  309.         Font.Color = clBlack
  310.         Font.Height = -17
  311.         Font.Name = 'System'
  312.         Font.Style = [fsBold]
  313.         ParentFont = False
  314.       end
  315.       object PaletteLabel: TLabel
  316.         Left = 13
  317.         Top = 171
  318.         Width = 71
  319.         Height = 20
  320.         Align = alTop
  321.         Alignment = taCenter
  322.         Font.Color = clBlack
  323.         Font.Height = -17
  324.         Font.Name = 'System'
  325.         Font.Style = [fsBold]
  326.         ParentFont = False
  327.       end
  328.       object BuildNumberLabel: TLabel
  329.         Left = 13
  330.         Top = 131
  331.         Width = 199
  332.         Height = 20
  333.         Align = alTop
  334.         Alignment = taCenter
  335.         Font.Color = clBlack
  336.         Font.Height = -17
  337.         Font.Name = 'System'
  338.         Font.Style = [fsBold]
  339.         ParentFont = False
  340.       end
  341.       object DecodeLabel: TLabel
  342.         Left = 13
  343.         Top = 111
  344.         Width = 199
  345.         Height = 20
  346.         Align = alTop
  347.         Alignment = taCenter
  348.         Font.Color = clBlack
  349.         Font.Height = -17
  350.         Font.Name = 'System'
  351.         Font.Style = [fsBold]
  352.         ParentFont = False
  353.       end
  354.       object CancelBtn: TABitbtn
  355.         Left = 13
  356.         Top = 78
  357.         Width = 199
  358.         Height = 33
  359.         Font.Color = clBlack
  360.         Font.Height = -17
  361.         Font.Name = 'System'
  362.         Font.Style = [fsBold]
  363.         ParentFont = False
  364.         TabOrder = 0
  365.         OnClick = CancelBtnClick
  366.         Kind = bkCancel
  367.         Align = alTop
  368.       end
  369.     end
  370.   end
  371.   object ListPanel: TMRPanel
  372.     Left = 0
  373.     Top = 0
  374.     Width = 129
  375.     Height = 322
  376.     Align = alLeft
  377.     BevelInner = bvLowered
  378.     BevelWidth = 2
  379.     BorderWidth = 1
  380.     Ctl3D = True
  381.     Font.Color = clBlack
  382.     Font.Height = -17
  383.     Font.Name = 'Times New Roman'
  384.     Font.Style = [fsBold, fsUnderline]
  385.     ParentCtl3D = False
  386.     ParentFont = False
  387.     TabOrder = 1
  388.     OnResize = ListPanelResize
  389.     BevelSides = [sdTop, sdRight]
  390.     BorderSides = []
  391.     Moveable = False
  392.     CBorderStyle = cbsNone
  393.     OnNCHitTest = ListPanelNCHitTest
  394.     object FrameLabel: TLabel
  395.       Left = 5
  396.       Top = 273
  397.       Width = 119
  398.       Height = 17
  399.       Align = alBottom
  400.       Caption = 'Frame Duration:'
  401.       Color = clBtnFace
  402.       Font.Color = clBtnText
  403.       Font.Height = -15
  404.       Font.Name = 'Times New Roman'
  405.       Font.Style = [fsBold]
  406.       ParentColor = False
  407.       ParentFont = False
  408.     end
  409.     object Bevel1: TBevel
  410.       Left = 5
  411.       Top = 228
  412.       Width = 119
  413.       Height = 7
  414.       Align = alBottom
  415.       Shape = bsBottomLine
  416.       Style = bsRaised
  417.     end
  418.     object SpinButton1: TSpinButton
  419.       Left = 5
  420.       Top = 235
  421.       Width = 119
  422.       Height = 38
  423.       Hint = 'This Cycles Though the Images ( in the list above)'
  424.       Align = alBottom
  425.       Ctl3D = True
  426.       DownGlyph.Data = {
  427.         7E040000424D7E04000000000000360400002800000009000000060000000100
  428.         0800000000004800000000000000000000000000000000000000000000000000
  429.         80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
  430.         A600000000000000000000000000000000000000000000000000000000000000
  431.         0000000000000000000000000000000000000000000000000000000000000000
  432.         0000000000000000000000000000000000000000000000000000000000000000
  433.         0000000000000000000000000000000000000000000000000000000000000000
  434.         0000000000000000000000000000000000000000000000000000000000000000
  435.         0000000000000000000000000000000000000000000000000000000000000000
  436.         0000000000000000000000000000000000000000000000000000000000000000
  437.         0000000000000000000000000000000000000000000000000000000000000000
  438.         0000000000000000000000000000000000000000000000000000000000000000
  439.         0000000000000000000000000000000000000000000000000000000000000000
  440.         0000000000000000000000000000000000000000000000000000000000000000
  441.         0000000000000000000000000000000000000000000000000000000000000000
  442.         0000000000000000000000000000000000000000000000000000000000000000
  443.         0000000000000000000000000000000000000000000000000000000000000000
  444.         0000000000000000000000000000000000000000000000000000000000000000
  445.         0000000000000000000000000000000000000000000000000000000000000000
  446.         0000000000000000000000000000000000000000000000000000000000000000
  447.         0000000000000000000000000000000000000000000000000000000000000000
  448.         0000000000000000000000000000000000000000000000000000000000000000
  449.         0000000000000000000000000000000000000000000000000000000000000000
  450.         0000000000000000000000000000000000000000000000000000000000000000
  451.         0000000000000000000000000000000000000000000000000000000000000000
  452.         0000000000000000000000000000000000000000000000000000000000000000
  453.         0000000000000000000000000000000000000000000000000000000000000000
  454.         0000000000000000000000000000000000000000000000000000000000000000
  455.         0000000000000000000000000000000000000000000000000000000000000000
  456.         0000000000000000000000000000000000000000000000000000000000000000
  457.         0000000000000000000000000000000000000000000000000000000000000000
  458.         0000000000000000000000000000000000000000000000000000000000000000
  459.         000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
  460.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
  461.         0303030000000303030300030303030000000303030000000303030000000303
  462.         0000000000030300000003000000000000000300000003030303030303030300
  463.         0000}
  464.       ParentCtl3D = False
  465.       ParentShowHint = False
  466.       ShowHint = True
  467.       TabOrder = 0
  468.       UpGlyph.Data = {
  469.         7E040000424D7E04000000000000360400002800000009000000060000000100
  470.         0800000000004800000000000000000000000000000000000000000000000000
  471.         80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
  472.         A600000000000000000000000000000000000000000000000000000000000000
  473.         0000000000000000000000000000000000000000000000000000000000000000
  474.         0000000000000000000000000000000000000000000000000000000000000000
  475.         0000000000000000000000000000000000000000000000000000000000000000
  476.         0000000000000000000000000000000000000000000000000000000000000000
  477.         0000000000000000000000000000000000000000000000000000000000000000
  478.         0000000000000000000000000000000000000000000000000000000000000000
  479.         0000000000000000000000000000000000000000000000000000000000000000
  480.         0000000000000000000000000000000000000000000000000000000000000000
  481.         0000000000000000000000000000000000000000000000000000000000000000
  482.         0000000000000000000000000000000000000000000000000000000000000000
  483.         0000000000000000000000000000000000000000000000000000000000000000
  484.         0000000000000000000000000000000000000000000000000000000000000000
  485.         0000000000000000000000000000000000000000000000000000000000000000
  486.         0000000000000000000000000000000000000000000000000000000000000000
  487.         0000000000000000000000000000000000000000000000000000000000000000
  488.         0000000000000000000000000000000000000000000000000000000000000000
  489.         0000000000000000000000000000000000000000000000000000000000000000
  490.         0000000000000000000000000000000000000000000000000000000000000000
  491.         0000000000000000000000000000000000000000000000000000000000000000
  492.         0000000000000000000000000000000000000000000000000000000000000000
  493.         0000000000000000000000000000000000000000000000000000000000000000
  494.         0000000000000000000000000000000000000000000000000000000000000000
  495.         0000000000000000000000000000000000000000000000000000000000000000
  496.         0000000000000000000000000000000000000000000000000000000000000000
  497.         0000000000000000000000000000000000000000000000000000000000000000
  498.         0000000000000000000000000000000000000000000000000000000000000000
  499.         0000000000000000000000000000000000000000000000000000000000000000
  500.         0000000000000000000000000000000000000000000000000000000000000000
  501.         000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
  502.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
  503.         0303030000000300000000000000030000000303000000000003030000000303
  504.         0300000003030300000003030303000303030300000003030303030303030300
  505.         0000}
  506.       OnDownClick = SpinButton1DownClick
  507.       OnUpClick = SpinButton1UpClick
  508.     end
  509.     object LBEdit1: TLBEdit
  510.       Left = 5
  511.       Top = 5
  512.       Width = 119
  513.       Height = 223
  514.       Hint = 'This is the image (frame) list.'
  515.       Align = alClient
  516.       BorderStyle = bsNone
  517.       Color = clBtnFace
  518.       Ctl3D = False
  519.       Font.Color = clBlack
  520.       Font.Height = -15
  521.       Font.Name = 'MS Sans Serif'
  522.       Font.Style = [fsBold]
  523.       ItemHeight = 16
  524.       MultiSelect = True
  525.       ParentCtl3D = False
  526.       ParentFont = False
  527.       ParentShowHint = False
  528.       PopupMenu = PopupMenu1
  529.       ShowHint = True
  530.       Style = lbOwnerDrawVariable
  531.       TabOrder = 1
  532.       OnClick = Listbox1Click
  533.       BTNBorderWidth = 0
  534.       ExtraHeight = 10
  535.       ShowItems = True
  536.       ShowIndex = True
  537.     end
  538.     object FlipSpin: TASpinEdit
  539.       Left = 5
  540.       Top = 290
  541.       Width = 119
  542.       Height = 27
  543.       Ctl3D = True
  544.       Font.Color = clWindowText
  545.       Font.Height = -15
  546.       Font.Name = 'Times New Roman'
  547.       Font.Style = [fsBold]
  548.       MaxValue = 1000000
  549.       MinValue = 1
  550.       ParentCtl3D = False
  551.       ParentFont = False
  552.       ParentShowHint = False
  553.       ShowHint = True
  554.       TabOrder = 2
  555.       Value = 1
  556.       OnChange = FlipSpinChange
  557.       Align = alBottom
  558.     end
  559.   end
  560.   object MainMenu1: TMainMenu
  561.     Left = 256
  562.     Top = 88
  563.     object ProjectMenu: TMenuItem
  564.       Caption = '&Project'
  565.       ShortCut = 0
  566.       OnClick = ProjectMenuClick
  567.       object NewProjectMenu: TMenuItem
  568.         Caption = 'Start New Project'
  569.         ShortCut = 0
  570.         OnClick = NewProjectMenuClick
  571.       end
  572.       object N10: TMenuItem
  573.         Caption = '-'
  574.         ShortCut = 0
  575.       end
  576.       object AddImages1: TMenuItem
  577.         Caption = 'Add Images ...'
  578.         ShortCut = 0
  579.         OnClick = AddImages1Click
  580.       end
  581.       object ExtractImagesFromAVI1: TMenuItem
  582.         Caption = '&Get images from an AVI ...'
  583.         ShortCut = 0
  584.         OnClick = ExtractImagesFromAVI1Click
  585.       end
  586.       object OpenFileList1: TMenuItem
  587.         Caption = '&Open file list ...'
  588.         ShortCut = 0
  589.         OnClick = OpenFileList1Click
  590.       end
  591.       object N1: TMenuItem
  592.         Caption = '-'
  593.         ShortCut = 0
  594.       end
  595.       object SaveFileListMenu: TMenuItem
  596.         Caption = '&Save file list ...'
  597.         ShortCut = 0
  598.         OnClick = SaveFileListMenuClick
  599.       end
  600.       object SaveAllImagesMenu: TMenuItem
  601.         Caption = '&Save or Save a Copy all images ...'
  602.         ShortCut = 0
  603.         OnClick = SaveAllImagesMenuClick
  604.       end
  605.       object N3: TMenuItem
  606.         Caption = '-'
  607.         ShortCut = 0
  608.       end
  609.       object Exit1: TMenuItem
  610.         Caption = 'E&xit AVI Constructor'
  611.         ShortCut = 0
  612.         OnClick = Exit1Click
  613.       end
  614.     end
  615.     object ListMenu: TMenuItem
  616.       Caption = '&Edit List'
  617.       ShortCut = 0
  618.       OnClick = ListMenuClick
  619.       object CutSelected: TMenuItem
  620.         Caption = 'Cut '
  621.         ShortCut = 16472
  622.         OnClick = CutSelectedClick
  623.       end
  624.       object CopySelected: TMenuItem
  625.         Caption = 'Copy '
  626.         ShortCut = 16451
  627.         OnClick = CopySelectedClick
  628.       end
  629.       object PasteAtSelected: TMenuItem
  630.         Caption = 'Paste '
  631.         ShortCut = 16470
  632.         OnClick = PasteAtSelectedClick
  633.       end
  634.       object Pasteat1: TMenuItem
  635.         Caption = 'Paste at beginning'
  636.         ShortCut = 16450
  637.         OnClick = Pasteat1Click
  638.       end
  639.       object PasteAfterLastItem: TMenuItem
  640.         Caption = 'Paste at end '
  641.         ShortCut = 16453
  642.         OnClick = PasteAfterLastItemClick
  643.       end
  644.       object RemoveSelected: TMenuItem
  645.         Caption = 'Delete'
  646.         ShortCut = 16430
  647.         OnClick = RemoveSelectedClick
  648.       end
  649.       object N2: TMenuItem
  650.         Caption = '-'
  651.         ShortCut = 0
  652.       end
  653.       object SelectAll1: TMenuItem
  654.         Caption = 'Select all'
  655.         ShortCut = 0
  656.         OnClick = SelectAll1Click
  657.       end
  658.       object SelectNone1: TMenuItem
  659.         Caption = 'Select none'
  660.         ShortCut = 0
  661.         OnClick = SelectNone1Click
  662.       end
  663.       object N6: TMenuItem
  664.         Caption = '-'
  665.         ShortCut = 0
  666.       end
  667.       object ReverseSelection1: TMenuItem
  668.         Caption = 'Reverse selection'
  669.         ShortCut = 0
  670.         OnClick = ReverseSelection1Click
  671.       end
  672.       object N4: TMenuItem
  673.         Caption = '-'
  674.         ShortCut = 0
  675.       end
  676.       object ReverseList1: TMenuItem
  677.         Caption = 'Reverse list'
  678.         ShortCut = 0
  679.         OnClick = ReverseList1Click
  680.       end
  681.       object SortList1: TMenuItem
  682.         Caption = 'Sort list'
  683.         ShortCut = 16467
  684.         OnClick = SortList1Click
  685.       end
  686.       object N18: TMenuItem
  687.         Caption = '-'
  688.         ShortCut = 0
  689.       end
  690.       object SetAllFrameRatesto11: TMenuItem
  691.         Caption = 'Set All Frame Rates to 1'
  692.         ShortCut = 0
  693.         OnClick = SetAllFrameRatesto11Click
  694.       end
  695.       object N11: TMenuItem
  696.         Caption = '-'
  697.         ShortCut = 0
  698.       end
  699.       object Makefromlistselection1: TMenuItem
  700.         Caption = 'Make AVI from selection'
  701.         ShortCut = 0
  702.         object Selection2ColorMenu: TMenuItem
  703.           Caption = '2 Color'
  704.           ShortCut = 0
  705.           OnClick = MakeMovie
  706.         end
  707.         object Selection16ColorMenu: TMenuItem
  708.           Caption = '16 Color'
  709.           ShortCut = 0
  710.           OnClick = MakeMovie
  711.         end
  712.         object Selection256ColorMenu: TMenuItem
  713.           Caption = '256 Color'
  714.           ShortCut = 0
  715.           OnClick = MakeMovie
  716.         end
  717.         object SelectionHighColorMenu: TMenuItem
  718.           Caption = 'High Color ( 16 bit )'
  719.           ShortCut = 0
  720.           OnClick = MakeMovie
  721.         end
  722.         object SelectionTrueColorMenu: TMenuItem
  723.           Caption = 'True Color ( 24 bit )'
  724.           ShortCut = 0
  725.           OnClick = MakeMovie
  726.         end
  727.         object Selection32bitTrueColorMenu: TMenuItem
  728.           Caption = 'True Color ( 32 bit )'
  729.           ShortCut = 0
  730.           OnClick = MakeMovie
  731.         end
  732.       end
  733.     end
  734.     object ImageMenu: TMenuItem
  735.       Caption = '&Image'
  736.       ShortCut = 0
  737.       OnClick = ImageMenuClick
  738.       object CopyImageMenu: TMenuItem
  739.         Caption = 'Copy image'
  740.         Hint = 'This places the image in the clipboard'
  741.         ShortCut = 0
  742.         OnClick = CopyImageMenuClick
  743.       end
  744.       object PasteAtBeginningMenu: TMenuItem
  745.         Caption = 'Paste at Beginning'
  746.         ShortCut = 0
  747.         OnClick = PasteAtBeginningMenuClick
  748.       end
  749.       object GetSaveTempAdd: TMenuItem
  750.         Caption = 'Get Image, Save as Temp. File, and Add Link'
  751.         ShortCut = 16468
  752.         OnClick = GetSaveTempAddClick
  753.       end
  754.       object PasteAtEndMenu: TMenuItem
  755.         Caption = 'Paste at End'
  756.         ShortCut = 0
  757.         OnClick = PasteAtEndMenuClick
  758.       end
  759.       object GetSaveAdd: TMenuItem
  760.         Caption = 'Get Image, Save  as ... , Add Link'
  761.         ShortCut = 16455
  762.         OnClick = GetSaveAddClick
  763.       end
  764.       object GetSaveIntoAdd: TMenuItem
  765.         Caption = 'Get Image, Save INTO ...,  Add Link '
  766.         ShortCut = 16466
  767.         OnClick = GetSaveIntoAddClick
  768.       end
  769.       object N12: TMenuItem
  770.         Caption = '-'
  771.         ShortCut = 0
  772.       end
  773.       object SaveImageMenu: TMenuItem
  774.         Caption = 'Save a copy of current Image'
  775.         ShortCut = 0
  776.         OnClick = SaveImageMenuClick
  777.       end
  778.       object SaveImageUpdateLinkMenu: TMenuItem
  779.         Caption = 'Save current Image + Update link '
  780.         ShortCut = 0
  781.         OnClick = SaveImageUpdateLinkMenuClick
  782.       end
  783.       object N14: TMenuItem
  784.         Caption = '-'
  785.         ShortCut = 0
  786.       end
  787.       object PrintScreenSizeMenu: TMenuItem
  788.         Caption = 'Print image - screen size'
  789.         ShortCut = 0
  790.         OnClick = Print1Click
  791.       end
  792.       object PrintToFitMenu: TMenuItem
  793.         Caption = 'Print image - fit to page '
  794.         ShortCut = 0
  795.         OnClick = PrintandFit1Click
  796.       end
  797.       object PrintAllMenu: TMenuItem
  798.         Caption = 'Print All'
  799.         ShortCut = 0
  800.         object PrintAllHorz1: TMenuItem
  801.           Caption = '=    in Rows      '
  802.           ShortCut = 0
  803.           OnClick = PrintAllHorz1Click
  804.         end
  805.         object TileAllVert1: TMenuItem
  806.           Caption = '||    in Columns '
  807.           ShortCut = 0
  808.           OnClick = TileAllVert1Click
  809.         end
  810.         object OneRow1: TMenuItem
  811.           Caption = '-     one row per page'
  812.           ShortCut = 0
  813.           OnClick = OneRow1Click
  814.         end
  815.         object OneColumn1: TMenuItem
  816.           Caption = '|     one Column per page'
  817.           ShortCut = 0
  818.           OnClick = OneColumn1Click
  819.         end
  820.         object N22: TMenuItem
  821.           Caption = '-'
  822.           ShortCut = 0
  823.         end
  824.         object N1Imageperpagefittopage1: TMenuItem
  825.           Caption = '1 Image per page - Fit to page'
  826.           ShortCut = 0
  827.           OnClick = N1Imageperpagefittopage1Click
  828.         end
  829.         object OneImageperpage1: TMenuItem
  830.           Caption = '1 Image per page - Screen Size'
  831.           ShortCut = 0
  832.           OnClick = OneImageperpage1Click
  833.         end
  834.       end
  835.       object N21: TMenuItem
  836.         Caption = '-'
  837.         ShortCut = 0
  838.       end
  839.       object SpawnMenu: TMenuItem
  840.         Caption = 'Start my default viewer with this image'
  841.         ShortCut = 115
  842.         OnClick = SpawnMenuClick
  843.       end
  844.     end
  845.     object MakeMenu: TMenuItem
  846.       Caption = '&Make AVI'
  847.       ShortCut = 0
  848.       OnClick = MakeMenuClick
  849.       object MakeDefaultMenu: TMenuItem
  850.         Caption = 'Assume all images are similar'
  851.         ShortCut = 115
  852.         OnClick = MakeMovie
  853.       end
  854.       object Make2ColorMenu: TMenuItem
  855.         Caption = '2 Color'
  856.         ShortCut = 116
  857.         OnClick = MakeMovie
  858.       end
  859.       object Make16ColorMenu: TMenuItem
  860.         Caption = '16 color'
  861.         ShortCut = 117
  862.         OnClick = MakeMovie
  863.       end
  864.       object Make256ColorMenu: TMenuItem
  865.         Caption = '256 color'
  866.         ShortCut = 118
  867.         OnClick = MakeMovie
  868.       end
  869.       object MakeHighColorMenu: TMenuItem
  870.         Caption = 'High color'
  871.         ShortCut = 119
  872.         OnClick = MakeMovie
  873.       end
  874.       object MakeTrueColorMenu: TMenuItem
  875.         Caption = 'True color '
  876.         ShortCut = 120
  877.         OnClick = MakeMovie
  878.       end
  879.       object Make32bitTrueColorMenu: TMenuItem
  880.         Caption = '32 bit true color'
  881.         ShortCut = 121
  882.         OnClick = MakeMovie
  883.       end
  884.       object N15: TMenuItem
  885.         Caption = '-'
  886.         ShortCut = 0
  887.       end
  888.       object NegativeColorMenu: TMenuItem
  889.         Caption = 'Negative Color'
  890.         ShortCut = 0
  891.         object Inverse2ColorMenu: TMenuItem
  892.           Caption = '2 Colors'
  893.           ShortCut = 0
  894.           OnClick = MakeMovie
  895.         end
  896.         object Inverse16ColorMenu: TMenuItem
  897.           Caption = '16 Colors'
  898.           ShortCut = 0
  899.           OnClick = MakeMovie
  900.         end
  901.         object Inverse256ColorMenu: TMenuItem
  902.           Caption = '256 Colors'
  903.           ShortCut = 0
  904.           OnClick = MakeMovie
  905.         end
  906.         object InverseTrueColorMenu: TMenuItem
  907.           Caption = 'True Color'
  908.           ShortCut = 0
  909.           OnClick = MakeMovie
  910.         end
  911.       end
  912.       object AdjustToColorMenu: TMenuItem
  913.         Caption = 'Adjust To Color '
  914.         ShortCut = 0
  915.         object Adjust2ColorMenu: TMenuItem
  916.           Caption = '2 Color ...'
  917.           ShortCut = 0
  918.           OnClick = MakeMovie
  919.         end
  920.         object Adjust16ColorMenu: TMenuItem
  921.           Caption = '16 Color ...'
  922.           ShortCut = 0
  923.           OnClick = MakeMovie
  924.         end
  925.         object Adjust256ColorMenu: TMenuItem
  926.           Caption = '256 Color ...'
  927.           ShortCut = 0
  928.           OnClick = MakeMovie
  929.         end
  930.         object AdjustTrueColorMenu: TMenuItem
  931.           Caption = 'True Color ...'
  932.           ShortCut = 0
  933.           OnClick = MakeMovie
  934.         end
  935.       end
  936.       object ColorScaleMenu: TMenuItem
  937.         Caption = 'Color Scale '
  938.         ShortCut = 0
  939.         object Scale2ColorMenu: TMenuItem
  940.           Caption = '2 Color ...'
  941.           ShortCut = 0
  942.           OnClick = MakeMovie
  943.         end
  944.         object Scale16ColorMenu: TMenuItem
  945.           Caption = '16 Color ...'
  946.           ShortCut = 0
  947.           OnClick = MakeMovie
  948.         end
  949.         object Scale256ColorMenu: TMenuItem
  950.           Caption = '256 Color ...'
  951.           ShortCut = 0
  952.           OnClick = MakeMovie
  953.         end
  954.         object ScaleTrueColorMenu: TMenuItem
  955.           Caption = 'True Color ...'
  956.           ShortCut = 0
  957.           OnClick = MakeMovie
  958.         end
  959.       end
  960.       object MaximumColorMenu: TMenuItem
  961.         Caption = 'Maximum Color'
  962.         ShortCut = 0
  963.         object Maximum2ColorMenu: TMenuItem
  964.           Caption = '2 Color ...'
  965.           ShortCut = 0
  966.           OnClick = MakeMovie
  967.         end
  968.         object Maximum16ColorMenu: TMenuItem
  969.           Caption = '16 Color ...'
  970.           ShortCut = 0
  971.           OnClick = MakeMovie
  972.         end
  973.         object Maximum256ColorMenu: TMenuItem
  974.           Caption = '256 Color ...'
  975.           ShortCut = 0
  976.           OnClick = MakeMovie
  977.         end
  978.         object MaximumTrueColorMenu: TMenuItem
  979.           Caption = 'True Color ...'
  980.           ShortCut = 0
  981.           OnClick = MakeMovie
  982.         end
  983.       end
  984.       object RandomColorMenu: TMenuItem
  985.         Caption = 'Random Color'
  986.         ShortCut = 0
  987.         object Random2ColorMenu: TMenuItem
  988.           Caption = '2 Color ...'
  989.           ShortCut = 0
  990.           OnClick = MakeMovie
  991.         end
  992.         object Random16ColorMenu: TMenuItem
  993.           Caption = '16 Color ...'
  994.           ShortCut = 0
  995.           OnClick = MakeMovie
  996.         end
  997.         object Random256ColorMenu: TMenuItem
  998.           Caption = '256 Color ...'
  999.           ShortCut = 0
  1000.           OnClick = MakeMovie
  1001.         end
  1002.         object RandomTrueColorMenu: TMenuItem
  1003.           Caption = 'TrueColor ...'
  1004.           ShortCut = 0
  1005.           OnClick = MakeMovie
  1006.         end
  1007.       end
  1008.       object N19: TMenuItem
  1009.         Caption = '-'
  1010.         ShortCut = 0
  1011.       end
  1012.       object Makefromfilelist1: TMenuItem
  1013.         Caption = 'Make AVI from a file list (text file)'
  1014.         ShortCut = 0
  1015.         object MakeDefaultAVIFromFileList: TMenuItem
  1016.           Caption = 'Assume All Images are similar'
  1017.           ShortCut = 0
  1018.           OnClick = MakeMovieFromFileList
  1019.         end
  1020.         object Make2ColorAVIFromFileList: TMenuItem
  1021.           Caption = '2 Color AVI'
  1022.           ShortCut = 0
  1023.           OnClick = MakeMovieFromFileList
  1024.         end
  1025.         object Make16ColorAVIFromFileList: TMenuItem
  1026.           Caption = '16 color AVI'
  1027.           ShortCut = 0
  1028.           OnClick = MakeMovieFromFileList
  1029.         end
  1030.         object Make256ColorAVIFromFileList: TMenuItem
  1031.           Caption = '256 color AVI'
  1032.           ShortCut = 0
  1033.           OnClick = MakeMovieFromFileList
  1034.         end
  1035.         object MakeHighColorAVIFromFileList: TMenuItem
  1036.           Caption = 'High Color AVI  ( 16 bit )'
  1037.           ShortCut = 0
  1038.           OnClick = MakeMovieFromFileList
  1039.         end
  1040.         object MakeTrueColorAVIFromFileList: TMenuItem
  1041.           Caption = 'True Color AVI  ( 24 bit )'
  1042.           ShortCut = 0
  1043.           OnClick = MakeMovieFromFileList
  1044.         end
  1045.         object Make32bitTrueColorAVIFromFileList: TMenuItem
  1046.           Caption = 'True Color AVI (  32 bit )'
  1047.           ShortCut = 0
  1048.           OnClick = MakeMovieFromFileList
  1049.         end
  1050.       end
  1051.     end
  1052.     object OptionsMenu: TMenuItem
  1053.       Caption = '&Options'
  1054.       ShortCut = 0
  1055.       OnClick = OptionsMenuClick
  1056.       object AutopasteMenu: TMenuItem
  1057.         Caption = 'AutoPaste new images from clipboard'
  1058.         Hint = 
  1059.           'If checked: When a new image enters clipboard, AVI Constructor w' +
  1060.           'ill get it.'
  1061.         ShortCut = 0
  1062.         OnClick = AutopasteMenuClick
  1063.       end
  1064.       object N9: TMenuItem
  1065.         Caption = '-'
  1066.         ShortCut = 0
  1067.       end
  1068.       object AVIOptions1: TMenuItem
  1069.         Caption = 'Video Options'
  1070.         ShortCut = 0
  1071.         OnClick = AVIOptions1Click
  1072.         object AskForCompressionMenu: TMenuItem
  1073.           Caption = 'Always Ask For Compression ( 256 Colors and above only )'
  1074.           ShortCut = 0
  1075.           OnClick = AskForCompressionMenuClick
  1076.         end
  1077.         object WriteColorPalettesMenu: TMenuItem
  1078.           Caption = 'Write Palette Changes '
  1079.           ShortCut = 0
  1080.           OnClick = WriteColorPalettesMenuClick
  1081.         end
  1082.         object KeyframeMenu: TMenuItem
  1083.           Caption = 'Keyframes '
  1084.           ShortCut = 0
  1085.           OnClick = KeyframeMenuClick
  1086.         end
  1087.       end
  1088.       object AVIAudioOptions1: TMenuItem
  1089.         Caption = 'Audio Options'
  1090.         ShortCut = 0
  1091.         OnClick = AVIAudioOptions1Click
  1092.         object NoAudioMenu: TMenuItem
  1093.           Caption = 'No Audio'
  1094.           ShortCut = 0
  1095.           OnClick = NoAudioMenuClick
  1096.         end
  1097.         object AskforAudioFileMenu: TMenuItem
  1098.           Caption = 'Ask for Audio File'
  1099.           ShortCut = 0
  1100.           OnClick = AskforAudioFileMenuClick
  1101.         end
  1102.         object AlwaysInsertAudioMenu: TMenuItem
  1103.           Caption = 'Always insert audio file ...'
  1104.           ShortCut = 0
  1105.           OnClick = AlwaysInsertAudioMenuClick
  1106.         end
  1107.       end
  1108.       object File1: TMenuItem
  1109.         Caption = 'AVI file name '
  1110.         ShortCut = 0
  1111.         OnClick = File1Click
  1112.         object AskforAVIFileMenu: TMenuItem
  1113.           Caption = 'Ask for AVI file name.'
  1114.           ShortCut = 0
  1115.           OnClick = AskforAVIFileMenuClick
  1116.         end
  1117.         object AlwaysSaveAVIAsMenu: TMenuItem
  1118.           Caption = 'Always save AVI file as ...'
  1119.           ShortCut = 0
  1120.           OnClick = AlwaysSaveAVIAsMenuClick
  1121.         end
  1122.       end
  1123.       object N16: TMenuItem
  1124.         Caption = '-'
  1125.         ShortCut = 0
  1126.       end
  1127.       object JPEGEncoding1: TMenuItem
  1128.         Caption = 'JPEG Encoding ...'
  1129.         ShortCut = 0
  1130.         OnClick = JPEGEncoding1Click
  1131.       end
  1132.       object JpegDecoding1: TMenuItem
  1133.         Caption = 'JPEG Decoding ...'
  1134.         ShortCut = 0
  1135.         OnClick = JpegDecoding1Click
  1136.       end
  1137.       object DefaultImageFormat1: TMenuItem
  1138.         Caption = 'Default Image Format'
  1139.         ShortCut = 0
  1140.         OnClick = DefaultImageFormat1Click
  1141.         object BMPDefault: TMenuItem
  1142.           Caption = 'Bitmap'
  1143.           ShortCut = 0
  1144.           OnClick = BMPDefaultClick
  1145.         end
  1146.         object JpegDefault: TMenuItem
  1147.           Caption = 'JPEG'
  1148.           ShortCut = 0
  1149.           OnClick = JpegDefaultClick
  1150.         end
  1151.       end
  1152.       object View1: TMenuItem
  1153.         Caption = 'Display'
  1154.         ShortCut = 0
  1155.         OnClick = View1Click
  1156.         object ShowFilesMenu: TMenuItem
  1157.           Caption = 'File names in image list'
  1158.           ShortCut = 0
  1159.           OnClick = ShowFilesMenuClick
  1160.         end
  1161.         object ShowFramesMenu: TMenuItem
  1162.           Caption = 'Frame numbers'
  1163.           ShortCut = 0
  1164.           OnClick = ShowFramesMenuClick
  1165.         end
  1166.         object ShowColorDisplayMenu: TMenuItem
  1167.           Caption = '# of colors in display image  '
  1168.           ShortCut = 0
  1169.           OnClick = ShowColorDisplayMenuClick
  1170.         end
  1171.         object FrameListLeftMenu: TMenuItem
  1172.           Caption = 'Put frame list to the left'
  1173.           ShortCut = 0
  1174.           OnClick = FrameListLeftMenuClick
  1175.         end
  1176.         object ShowAVIOptionsMenu: TMenuItem
  1177.           Caption = 'AVI Options '
  1178.           ShortCut = 0
  1179.           OnClick = ShowAVIOptionsMenuClick
  1180.         end
  1181.       end
  1182.       object N17: TMenuItem
  1183.         Caption = '-'
  1184.         ShortCut = 0
  1185.       end
  1186.       object ShowHintsMenu: TMenuItem
  1187.         Caption = 'Show Hints'
  1188.         ShortCut = 0
  1189.         OnClick = ShowHintsMenuClick
  1190.       end
  1191.       object AutoPlayMenu: TMenuItem
  1192.         Caption = 'Spawn to default player after building AVI'
  1193.         ShortCut = 0
  1194.         OnClick = AutoPlayMenuClick
  1195.       end
  1196.       object WarningsMenu: TMenuItem
  1197.         Caption = 'Overwrite file warnings'
  1198.         ShortCut = 0
  1199.         OnClick = WarningsMenuClick
  1200.       end
  1201.       object SoundMenu: TMenuItem
  1202.         Caption = 'Sounds'
  1203.         ShortCut = 0
  1204.         OnClick = SoundMenuClick
  1205.       end
  1206.       object N23: TMenuItem
  1207.         Caption = '-'
  1208.         ShortCut = 0
  1209.       end
  1210.       object PresentationModeMenu: TMenuItem
  1211.         Caption = 'Full Screen Mode'
  1212.         ShortCut = 0
  1213.         OnClick = PresentationModeMenuClick
  1214.       end
  1215.     end
  1216.     object ToolsMenu: TMenuItem
  1217.       Caption = '&Tools'
  1218.       ShortCut = 0
  1219.       object ICapture1: TMenuItem
  1220.         Caption = 'Capture an image from another window'
  1221.         ShortCut = 0
  1222.         OnClick = ICapture1Click
  1223.       end
  1224.     end
  1225.     object AboutMenu: TMenuItem
  1226.       Caption = 'About'
  1227.       ShortCut = 0
  1228.       object About2: TMenuItem
  1229.         Caption = 'About ...'
  1230.         ShortCut = 0
  1231.         OnClick = About2Click
  1232.       end
  1233.       object WherecanIsendaquestioncommentorsuggestion1: TMenuItem
  1234.         Caption = 'Product support ...'
  1235.         ShortCut = 0
  1236.         OnClick = WherecanIsendaquestioncommentorsuggestion1Click
  1237.       end
  1238.       object N13: TMenuItem
  1239.         Caption = '-'
  1240.         ShortCut = 0
  1241.       end
  1242.       object HowdoIcompressanAVI1: TMenuItem
  1243.         Caption = 'How do I compress an AVI?'
  1244.         ShortCut = 0
  1245.         OnClick = HowdoIcompressanAVI1Click
  1246.       end
  1247.       object HowdoIaddaudiotoanAVI1: TMenuItem
  1248.         Caption = 'How do I add sound to an AVI?'
  1249.         ShortCut = 0
  1250.         OnClick = HowdoIaddaudiotoanAVI1Click
  1251.       end
  1252.     end
  1253.   end
  1254.   object SaveListDialog: TSaveDialog
  1255.     FileEditStyle = fsEdit
  1256.     Filter = 'Bitmap (*.BMP)|*.BMP|All Files (*.*)|*.*'
  1257.     Left = 481
  1258.     Top = 162
  1259.   end
  1260.   object PopupMenu1: TPopupMenu
  1261.     OnPopup = PopupMenu1Popup
  1262.     Left = 280
  1263.     Top = 96
  1264.     object Cut1: TMenuItem
  1265.       Caption = 'Cut'
  1266.       ShortCut = 0
  1267.       OnClick = CutSelectedClick
  1268.     end
  1269.     object copy1: TMenuItem
  1270.       Caption = 'Copy'
  1271.       ShortCut = 0
  1272.       OnClick = CopySelectedClick
  1273.     end
  1274.     object Paste2: TMenuItem
  1275.       Caption = 'Paste'
  1276.       ShortCut = 0
  1277.       OnClick = PasteAtSelectedClick
  1278.     end
  1279.     object PasteatBeginning1: TMenuItem
  1280.       Caption = 'Paste at Beginning'
  1281.       ShortCut = 0
  1282.       OnClick = Pasteat1Click
  1283.     end
  1284.     object PasteatEnd1: TMenuItem
  1285.       Caption = 'Paste at End'
  1286.       ShortCut = 0
  1287.       OnClick = PasteAfterLastItemClick
  1288.     end
  1289.     object Delete1: TMenuItem
  1290.       Caption = 'Delete'
  1291.       ShortCut = 0
  1292.       OnClick = RemoveSelectedClick
  1293.     end
  1294.     object N5: TMenuItem
  1295.       Caption = '-'
  1296.       ShortCut = 0
  1297.     end
  1298.     object ReverseSelection2: TMenuItem
  1299.       Caption = 'Reverse selection'
  1300.       Enabled = False
  1301.       ShortCut = 0
  1302.       OnClick = ReverseSelection2Click
  1303.     end
  1304.     object N7: TMenuItem
  1305.       Caption = '-'
  1306.       ShortCut = 0
  1307.     end
  1308.     object MakeAVIfromselection: TMenuItem
  1309.       Caption = 'Make 256 color AVI from selection'
  1310.       ShortCut = 0
  1311.     end
  1312.     object MakeTCAVIfromselection: TMenuItem
  1313.       Caption = 'Make true color AVI from selection'
  1314.       ShortCut = 0
  1315.     end
  1316.   end
  1317.   object PopupMenu2: TPopupMenu
  1318.     OnPopup = PopupMenu2Popup
  1319.     Left = 297
  1320.     Top = 108
  1321.     object CopyThisImage1: TMenuItem
  1322.       Caption = 'Copy This Image'
  1323.       ShortCut = 0
  1324.       OnClick = CopyImageMenuClick
  1325.     end
  1326.     object GetAddImage2: TMenuItem
  1327.       Caption = 'Past Clipboard Image at Selected Position'
  1328.       ShortCut = 0
  1329.       OnClick = GetSaveTempAddClick
  1330.     end
  1331.     object GetSaveAddImage2: TMenuItem
  1332.       Caption = 'Paste Clipboard Image at Selected Position (But save it first)'
  1333.       ShortCut = 0
  1334.       OnClick = GetSaveAddClick
  1335.     end
  1336.   end
  1337.   object ColorDialog: TColorDialog
  1338.     Ctl3D = True
  1339.     Color = clSilver
  1340.     Options = [cdFullOpen]
  1341.     Left = 327
  1342.     Top = 32
  1343.   end
  1344.   object PopupMenu3: TPopupMenu
  1345.     Left = 329
  1346.     Top = 224
  1347.     object About1: TMenuItem
  1348.       Caption = '&About'
  1349.       ShortCut = 0
  1350.       OnClick = About2Click
  1351.     end
  1352.   end
  1353. end
  1354.